QRZ! Ham Radio 5/QRZ Ham Radio Callsign Database - Volume 5.iso/files/mac/varilogs.hqx/Logs/Logging Stacks USA/Radio/stack.txt

Text File | 1988-03-23 | 3.7 KB | 136 lines

-- stack: in
-- format: 8 (HyperCard 1)
-- flags: 0x0 (none)
-- protect password hash: 0
-- maximum user level: 5 (scripting)
-- window: Rect(x1=0, y1=0, x2=0, y2=0)
-- screen: Rect(x1=0, y1=0, x2=0, y2=0)
-- card dimensions: w=0 h=0
-- scroll: x=0 y=0
-- background count: 1
-- first background id: 2782
-- card count: 6
-- first card id: 2983
-- list block id: 5604
-- print block id: 0
-- font table block id: 0
-- style table block id: 0
-- free block count: 2
-- free size: 7072 bytes
-- total size: 24576 bytes
-- stack block size: 3072 bytes
-- created by hypercard version: 0x00000000
-- compacted by hypercard version: 0x00000000
-- modified by hypercard version: 0x00000000
-- opened by hypercard version: 0x00000000
-- patterns[0]: 0x0000000000000000
-- patterns[1]: 0x8000000008000000
-- patterns[2]: 0x8800220088002200
-- patterns[3]: 0x8888222288882222
-- patterns[4]: 0x88AA22AA88AA22AA
-- patterns[5]: 0xCCAA33AACCAA33AA
-- patterns[6]: 0xEEAABBAAEEAABBAA
-- patterns[7]: 0xEEBBBBEEEEBBBBEE
-- patterns[8]: 0xFFBBFFEEFFBBFFEE
-- patterns[9]: 0xFFBBFFFFFFBBFFFF
-- patterns[10]: 0x8010022001084004
-- patterns[11]: 0xFFFFFFFFFFFFFFFF
-- patterns[12]: 0x8822882288228822
-- patterns[13]: 0x1122448811224488
-- patterns[14]: 0xC4800C6843023026
-- patterns[15]: 0xB130031BD8C00C8D
-- patterns[16]: 0xAA00AA00AA00AA00
-- patterns[17]: 0x8822552288225522
-- patterns[18]: 0x8855225588552255
-- patterns[19]: 0x77DD77DD77DD77DD
-- patterns[20]: 0x8000000000000000
-- patterns[21]: 0xAA55AA55AA55AA55
-- patterns[22]: 0x038448300C020101
-- patterns[23]: 0x8244394482010101
-- patterns[24]: 0x8814224188412214
-- patterns[25]: 0x8080413E080814E3
-- patterns[26]: 0x22048C7422179810
-- patterns[27]: 0xBE808808EB088880
-- patterns[28]: 0x25C8328964244C92
-- patterns[29]: 0xA29C41BE2AC914EB
-- patterns[30]: 0x40A00000040A0000
-- patterns[31]: 0x8040200002040800
-- patterns[32]: 0xAA00800088008000
-- patterns[33]: 0xFF80808080808080
-- patterns[34]: 0x081C22C180010204
-- patterns[35]: 0xFF808080FF080808
-- patterns[36]: 0xF87422478F172271
-- patterns[37]: 0xBF00BFBFB0B0B0B0
-- patterns[38]: 0xFF7FBE5DA2418000
-- patterns[39]: 0xFAF5FAF5A050A050
-- checksum: 0x0
----- HyperTalk script -----
on openStack
  show menuBar
  hide message
  hide card field "author"
  global call --haven't figured much of a use for this, but here it is!
  put card field "Call" of card "Radio Set Up" into call
  if call is empty then
    ask "Please enter your call"
    put it into card field "Call"
    put it into call
  end if
  get loc of button "Time & Date" of card "Radio Set Up"
  click at it
  wait 20
end openStack
on time_setup
  global timezone
  global zfactor
  put card field "Time Zone" of card "Radio Set Up" into timezone
  if timezone is empty then
    ask "Please enter your time zone." with "MST"
    put it into timezone
    put it into card field "Time Zone"
  end if
  if timezone is "AST" then
    put 4*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "EDT" then
    put 4*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "EST" then
    put 5*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "CDT" then
    put 5*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "CST" then
    put 6*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "MDT" then
    put 6*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "MST" then
    put 7*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "PDT" then
    put 7*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "PST" then
    put 8*60*60 into zfactor
    exit time_setup
  end if
  if timezone is "W" then
    put 10*60*60 into zfactor
  else
    answer "Please edit stack script to include your time zone"
  end if
end time_setup